home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1996 April / Macworld (1996-04).dmg / Educational Demos / Goldilocks Gamebook / Goldilocks.DIR / 00157_Script_157 < prev    next >
Text File  |  1995-11-20  |  529b  |  27 lines

  1. -- ground
  2.  
  3. on mouseDown 
  4.   global currentColor,p2
  5.   puppetSound "Click.AIF"
  6.   puppetSprite 3, true
  7.   if currentColor = "red" then
  8.     set the castNum of sprite 3 to 55
  9.     put 0 into p2
  10.   end if
  11.   if currentColor = "blu" then
  12.     set the castNum of sprite 3 to 56
  13.     put 0 into p2
  14.   end if
  15.   if currentColor = "bro" then
  16.     set the castNum of sprite 3 to 57
  17.     put 0 into p2
  18.   end if
  19.   if currentColor = "gre" then
  20.     set the castNum of sprite 3 to 58
  21.     put 1 into p2
  22.   end if
  23.   updateStage
  24. end
  25.  
  26.  
  27.